Im Beispiel unten binde ich die PostgreSQL-Library mit der Präprozessor-Anweisung @INCLUDE ein.


Dieser kleine Code meldet den Benutzer "test" bei der Datenbank "postgres" an.

Bitte passen Sie die Benutzerdaten Ihren Gegebenheiten an.


In diesem Beispiel läuft die Datenbank lokal auf meinem Rechner und lauscht an Port 5432.

Sollte die Datenbank nicht auf Ihren Rechner laufen sondern beispielsweise auf einem anderen Rechner im lokalen Netzwerk müsse Sie "localhost" gegen dessen IP austauschen.


Dies gilt übrigens für alle weiteren Beispiele!



/****************************************************************

**                                                             **

** Name:        1_OpenDatabase                                 **

** Author:      Michael Suther                                 **

** Date:        07.04.19                                       **

** Interpreter: Hollywood 8.0                                  **

** Function:    Öffnen und schließen einer PosgreSQL-DB        **

**                                                             **

**                                                             **

****************************************************************/


@INCLUDE "PostgreSQL_Lib.hws"


Block        

       ;Netzwerkverbindung zum PostgreSQL-Server herstellen.

       Local ConnectionID = OpenConnection(Nil,"localhost",5432)

       

       ;Einige Variablen definieren

       Local Fail

       Local Errorcode

       Local Database$ = "postgres"

       Local Username$ = "test"

       Local Passwort$ = "test"

       

       ;Anmeldung

       Fail, ErrorCode = PG:OpenDatabase(Database$, Username$, Passwort$, ConnectionID)

       

       ; Auswerten der Rückgabewerte

       If Fail = False 

               NPrint("Verbindung wurde erfolgreich hergestellt.")

       Else

               NPrint("Die Verbindung ist fehlgeschlagen,")

               NPrint("Fehlercode:  ", ErrorCode)

       EndIf

       

       WaitLeftMouse        

       

       ;Verbindung zur Datenbank schließen.

       PG:CloseDatabase(ConnectionID)

               

EndBlock

Mit dem Personal Edition von HelpNDoc erstellt: Hilfedateien für das Qt Help-Framework erstellen